home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Personal Computer World 2006 February
/
PCWFEB06.iso
/
Software
/
Freeware
/
Registrar Lite 4.01
/
reglite.exe
/
{app}
/
rr.exe
/
0
/
RCDATA
/
TFILEREFFORM
/
TFILEREFFORM.txt
Wrap
Text File
|
2005-11-07
|
19KB
|
754 lines
object FileRefForm: TFileRefForm
Tag = 5
Left = 163
Top = 274
Width = 780
Height = 597
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
Caption = 'File References'
Color = clBtnFace
DragKind = dkDock
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poDefault
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 13
object SplitterSearch: TSplitter
Left = 230
Top = 0
Height = 510
Beveled = True
MinSize = 10
ResizeStyle = rsUpdate
end
object panelResults: TPanel
Left = 233
Top = 0
Width = 539
Height = 510
Align = alClient
AutoSize = True
BevelOuter = bvNone
BorderWidth = 3
TabOrder = 0
object ListviewFileRef: TListView
Left = 3
Top = 3
Width = 533
Height = 504
Align = alClient
Columns = <
item
Caption = 'File'
Width = 200
end
item
Caption = 'Presence'
Width = 70
end
item
Caption = 'Machine'
Width = 80
end
item
Caption = 'Company'
Width = 100
end
item
Caption = 'Description'
Width = 100
end
item
Caption = 'References'
Width = 40
end
item
Caption = 'Registry Locations'
Width = 314
end>
FullDrag = True
GridLines = True
HideSelection = False
HotTrackStyles = [htHandPoint, htUnderlineHot]
LargeImages = ImageListFileRef
MultiSelect = True
OwnerData = True
ReadOnly = True
RowSelect = True
PopupMenu = PopupMenuFileRef
SmallImages = ImageListFileRef
TabOrder = 0
ViewStyle = vsReport
OnChange = ListviewFileRefChange
OnKeyDown = ListviewFileRefKeyDown
end
end
object CoolbarSearch: TCoolBar
Left = 0
Top = 510
Width = 772
Height = 34
Align = alBottom
AutoSize = True
BandBorderStyle = bsNone
Bands = <
item
Break = False
Control = ToolBarSearch
ImageIndex = -1
MinHeight = 30
Width = 768
end>
object ToolBarSearch: TToolBar
Tag = 2
Left = 9
Top = 0
Width = 755
Height = 30
Align = alNone
ButtonHeight = 30
ButtonWidth = 31
Caption = 'ToolBarButtons'
DisabledImages = MainForm.ImageListToolbarDisabled
EdgeBorders = []
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
HotImages = MainForm.ImageListSaturated
Images = MainForm.ImageListToolbar
ParentShowHint = False
ShowHint = True
TabOrder = 0
Transparent = True
Wrapable = False
object ButtonSearch: TToolButton
Left = 0
Top = 0
Hint = 'Search'
Caption = 'ButtonSearch'
ImageIndex = 10
OnClick = ButtonSearchClick
end
object ButtonPause: TToolButton
Left = 31
Top = 0
Hint = 'Pause'
Caption = 'ButtonPause'
Enabled = False
ImageIndex = 27
Visible = False
OnClick = ButtonPauseClick
end
object ButtonStop: TToolButton
Left = 62
Top = 0
Hint = 'Stop'
Caption = 'ButtonStop'
Enabled = False
ImageIndex = 32
OnClick = ButtonStopClick
end
object ToolButton3: TToolButton
Left = 93
Top = 0
Width = 8
Caption = 'ToolButton3'
ImageIndex = 19
Style = tbsSeparator
end
object ButtonJumpTo: TToolButton
Left = 101
Top = 0
Hint = 'Jump to'
Caption = '&Jump To'
DropdownMenu = PopupMenuLocations
Enabled = False
ImageIndex = 25
Style = tbsDropDown
OnClick = ButtonJumpToClick
end
object ButtonDelete: TToolButton
Left = 145
Top = 0
Hint = 'Delete'
Caption = 'ButtonDelete'
ImageIndex = 6
OnClick = ButtonDeleteClick
end
object ToolButton21: TToolButton
Left = 176
Top = 0
Width = 8
Caption = 'ToolButton21'
ImageIndex = 15
Style = tbsSeparator
end
object ButtonProperties: TToolButton
Left = 184
Top = 0
Hint = 'Properties'
Caption = 'ButtonProperties'
Enabled = False
ImageIndex = 8
OnClick = ButtonPropertiesClick
end
object ButtonExportSep: TToolButton
Left = 215
Top = 0
Width = 8
Caption = 'ButtonExportSep'
ImageIndex = 15
Style = tbsSeparator
end
object ButtonStayOnTop: TToolButton
Left = 223
Top = 0
Hint = 'Stay on top'
Caption = 'ButtonStayOnTop'
ImageIndex = 16
Style = tbsCheck
OnClick = ButtonStayOnTopClick
end
object ToolButton2: TToolButton
Left = 254
Top = 0
Width = 8
Caption = 'ToolButton2'
ImageIndex = 18
Style = tbsSeparator
end
object ButtonHelp: TToolButton
Left = 262
Top = 0
Hint = 'Help'
Caption = 'ActionHelp'
ImageIndex = 17
OnClick = ButtonHelpClick
OnMouseUp = ButtonHelpMouseUp
end
end
end
object PanelStatus: TPanel
Left = 0
Top = 544
Width = 772
Height = 19
Align = alBottom
AutoSize = True
BevelOuter = bvNone
TabOrder = 2
object StatusBarSearch: TStatusBar
Left = 0
Top = 0
Width = 772
Height = 19
Panels = <>
SimplePanel = True
SimpleText = 'Status: Ready'
end
end
object ScrollBoxFileRef: TScrollBox
Left = 0
Top = 0
Width = 230
Height = 510
VertScrollBar.Smooth = True
VertScrollBar.Style = ssHotTrack
VertScrollBar.Tracking = True
Align = alLeft
Color = clBtnFace
ParentColor = False
TabOrder = 3
object RollOutSearchText: TJvRollout
Left = 0
Top = 73
Width = 226
Height = 73
Caption = 'Text or data to search for'
Align = alTop
ButtonHeight = 22
ColHiText = clBlue
FrameColTop = clWindow
FrameColBtm = clWindow
FullRepaint = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ImageExpanded = 56
ImageCollapsed = 55
ImageList = MainForm.ImageListMenu
ImageOffset = 10
ParentFont = False
TabOrder = 0
OnMouseDown = RollOutSearchTextMouseDown
DesignSize = (
226
73)
FAWidth = 145
FAHeight = 73
FCWidth = 209
FCHeight = 22
object ComboBoxSearchText: TComboBox
Left = 8
Top = 32
Width = 193
Height = 21
Anchors = [akLeft, akTop, akRight]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 0
OnChange = ComboBoxSearchTextChange
OnDropDown = ComboBoxSearchTextDropDown
OnExit = ComboBoxSearchTextExit
OnKeyDown = ComboBoxSearchTextKeyDown
OnKeyPress = ComboBoxSearchTextKeyPress
end
end
object RollOutSearchWhere: TJvRollout
Left = 0
Top = 146
Width = 226
Height = 87
Caption = 'Where to search'
Align = alTop
ButtonHeight = 22
ColHiText = clBlue
FrameColTop = clWindow
FrameColBtm = clWindow
FullRepaint = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ImageExpanded = 56
ImageCollapsed = 55
ImageList = MainForm.ImageListMenu
ImageOffset = 10
ParentFont = False
TabOrder = 1
DesignSize = (
226
87)
FAWidth = 145
FAHeight = 87
FCWidth = 209
FCHeight = 22
object Label4: TLabel
Left = 8
Top = 32
Width = 48
Height = 13
Caption = 'Search in:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ButtonBrowse: TSpeedButton
Left = 179
Top = 50
Width = 23
Height = 17
Anchors = [akTop, akRight]
Caption = '..'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
OnClick = ButtonBrowseClick
OnMouseDown = ButtonBrowseMouseDown
end
object ComboBoxKey: TComboBox
Left = 8
Top = 48
Width = 169
Height = 21
Anchors = [akLeft, akTop, akRight]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnKeyDown = ComboBoxKeyKeyDown
end
end
object RollOutSearchResults: TJvRollout
Left = 0
Top = 233
Width = 226
Height = 163
Caption = 'Results'
Align = alTop
ButtonHeight = 22
ColHiText = clBlue
FrameColTop = clWindow
FrameColBtm = clWindow
FullRepaint = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ImageExpanded = 56
ImageCollapsed = 55
ImageList = MainForm.ImageListMenu
ImageOffset = 10
ParentFont = False
TabOrder = 2
FAWidth = 209
FAHeight = 163
FCWidth = 22
FCHeight = 22
object LabelSearched: TLabel
Left = 8
Top = 68
Width = 77
Height = 14
Caption = 'Keys searched:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelKeys: TLabel
Left = 6
Top = 92
Width = 99
Height = 14
Alignment = taRightJustify
Caption = 'key names matches:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelValues: TLabel
Left = 7
Top = 108
Width = 102
Height = 14
Alignment = taRightJustify
Caption = 'value name matches:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelData: TLabel
Left = 8
Top = 124
Width = 68
Height = 14
Caption = 'data matches:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelKeysSearched: TLabel
Left = 132
Top = 68
Width = 6
Height = 14
BiDiMode = bdLeftToRight
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentBiDiMode = False
ParentFont = False
end
object LabelKeysFound: TLabel
Left = 132
Top = 92
Width = 101
Height = 13
AutoSize = False
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelValuesFound: TLabel
Left = 132
Top = 108
Width = 93
Height = 13
AutoSize = False
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelDataFound: TLabel
Left = 132
Top = 124
Width = 101
Height = 18
AutoSize = False
Caption = '0'
DragKind = dkDock
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelTime: TLabel
Left = 8
Top = 44
Width = 66
Height = 14
Caption = 'Time Elapsed:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
object LabelTimeElapsed: TLabel
Left = 132
Top = 44
Width = 85
Height = 13
AutoSize = False
Caption = '0'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma, Ms Sans Serif'
Font.Style = []
ParentFont = False
end
end
object RollOutSearchType: TJvRollout
Left = 0
Top = 0
Width = 226
Height = 73
Caption = 'Options'
Align = alTop
ButtonColBtm = clGray
ButtonHeight = 22
ButtonColTop = clBlack
ColHiText = clBlue
FrameColTop = clWindow
FrameColBtm = clWindow
FullRepaint = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ImageExpanded = 56
ImageCollapsed = 55
ImageList = MainForm.ImageListMenu
ImageOffset = 10
ParentFont = False
TabOrder = 3
FAWidth = 145
FAHeight = 73
FCWidth = 209
FCHeight = 22
object CheckBoxFileRefMissingOnly: TCheckBox
Left = 8
Top = 32
Width = 161
Height = 17
Caption = 'Search for missing files only'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = CheckBoxFileRefMissingOnlyClick
end
object CheckBoxFileRefRetrieveIcons: TCheckBox
Left = 8
Top = 48
Width = 177
Height = 17
Caption = 'Display file icons'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 1
OnClick = CheckBoxFileRefRetrieveIconsClick
end
end
end
object SaveDialogSearch: TSaveDialog
DefaultExt = '.txt'
FileName = '*.reg'
Filter = 'Registry Files (*.reg) | *.reg'
Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
Title = 'Save search results to a reg file'
Left = 320
Top = 136
end
object PopupMenuFileRef: TPopupMenu
Images = MainForm.ImageListMenu
MenuAnimation = [maLeftToRight]
OnPopup = PopupMenuFileRefPopup
Left = 536
Top = 264
object popupExploreFolder: TMenuItem
Caption = 'E&xplore folder ..'
ImageIndex = 13
OnClick = popupExploreFolderClick
end
object popupFileproperties: TMenuItem
Caption = '&File properties'
ImageIndex = 4
OnClick = popupFilepropertiesClick
end
object popupJumpTo: TMenuItem
Caption = '&Jump To Registry value'
SubMenuImages = MainForm.listSmall
ImageIndex = 23
OnClick = popupJumpToClick
object mmLocation: TMenuItem
SubMenuImages = MainForm.listSmall
Visible = False
end
end
object popupRemove: TMenuItem
Caption = 'R&emove from Search Results'
ImageIndex = 3
OnClick = popupRemoveClick
end
end
object PopupMenuSearchToolbar: TPopupMenu
OnPopup = PopupMenuSearchToolbarPopup
Left = 536
Top = 333
object mmSearchToolbarAtBottom: TMenuItem
Caption = 'Toolbar at bottom'
OnClick = mmSearchToolbarAtBottomClick
end
end
object mmSearchRemoveItems: TPopupMenu
Left = 418
Top = 280
object mmSearchRemoveEntries: TMenuItem
Caption = '&Remove entries from list'
OnClick = mmSearchRemoveEntriesClick
end
object mmSearchDelete: TMenuItem
Caption = 'Delete selected keys and values'
OnClick = mmSearchDeleteClick
end
end
object regFileRef: TRspReg
OnChangeKey = regFileRefChangeKey
OnSearchCompleted = regFileRefSearchCompleted
OnTimeToUpdate = regFileRefTimeToUpdate
Key = 2147483647
ForceAccessDenied = False
RootKey = 2147483647
RootKeyIndex = rkHKEY_NONE
AbbreviatedRootKeys = False
Running = False
DoSynchronize = False
AddValuesOnKeyMatch = True
CollectData = True
MinDataSize = -1
MaxDataSize = -1
ValueTypeFilter = 16777215
SearchCaseSensitive = False
SearchPriority = tpNormal
SearchKeys = False
SearchValues = False
SearchData = False
SearchType = stText
SearchExpandEnvironment = False
Left = 320
Top = 336
end
object TimerImages: TTimer
Enabled = False
Left = 536
Top = 400
end
object ImageListFileRef: TImageList
AllocBy = 10000
Height = 32
ShareImages = True
Width = 32
Left = 320
Top = 400
end
object PopupMenuLocations: TPopupMenu
Images = MainForm.listSmall
OnPopup = PopupMenuLocationsPopup
Left = 536
Top = 200
end
object dataView: TRspDbView
OnShowItem = dataViewShowItem
ListView = ListviewFileRef
Data = data
AutoColumns = False
Running = False
Left = 416
Top = 400
end
object data: TRspDb
Interlocked = True
Left = 416
Top = 336
end
end